﻿Public Class frm_Main

    Private Sub MantenimientoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MantenimientoToolStripMenuItem.Click
        Dim _alumno As New frm_ABM_Alumnos
        _alumno.ShowDialog()
    End Sub

    Private Sub GestiónToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GestiónToolStripMenuItem.Click
        Dim _cursos As New frm_ABM_Cursos
        _cursos.ShowDialog()
    End Sub

    Private Sub TiposDeCursosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TiposDeCursosToolStripMenuItem.Click
        Dim _tiposCursos As New frm_ABM_TipoCurso
        _tiposCursos.ShowDialog()
    End Sub

    Private Sub GestiónToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GestiónToolStripMenuItem1.Click
        Dim _profesor As New frm_ABM_Profesores
        _profesor.ShowDialog()
    End Sub

    Private Sub TitulosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TitulosToolStripMenuItem.Click
        Dim _titulos As New frm_ABM_Titulos
        _titulos.ShowDialog()
    End Sub

    Private Sub BancosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BancosToolStripMenuItem.Click
        Dim _bancos As New frm_ABM_Bancos
        _bancos.ShowDialog()
    End Sub

    Private Sub TarjetasToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TarjetasToolStripMenuItem.Click
        Dim _tarjetas As New frm_ABM_Tarjetas
        _tarjetas.ShowDialog()
    End Sub

    Private Sub ExámenesToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExámenesToolStripMenuItem.Click
        Dim _examenes As New frm_ABM_Examenes
        _examenes.ShowDialog()
    End Sub

    Private Sub InscripciónToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InscripciónToolStripMenuItem.Click
        Dim _inscripcion As New frm_Inscripcion
        _inscripcion.ShowDialog()
    End Sub

    Private Sub ReciboToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ReciboToolStripMenuItem.Click
        Dim _recibo As New frm_Recibo
        _recibo.ShowDialog()
    End Sub
End Class
